home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 43 / Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso / -serious- / graphics / fxforge / ray dream 2 < prev    next >
Text File  |  1999-06-15  |  841b  |  26 lines
  1. Category: Filter Factory Gallery S
  2. Title: Ray Dream 2
  3. Author: Pawel Gluszynski, Sandy Blair
  4. Copyright: © 1997, yes
  5.  
  6. ctl[0]: Mode I
  7. ctl[1]: Mode II
  8. ctl[2]: Red Zoom
  9. ctl[3]: Rings
  10. ctl[4]: 
  11. ctl[5]: 
  12. ctl[6]:
  13. ctl[7]: 
  14. val[0]: 93
  15. val[1]: 73
  16. val[2]: 8
  17. val[3]: 9
  18. val[4]: 0
  19. val[5]: 0
  20. val[6]: 0
  21. val[7]: 0
  22. R:put(scl(m,0,val(2,M/2,M*4),-512,512),0),put(d*val(1,1,16),1),put(sin(sin((((ctl(1))%1)*get(ctl(0))%2)+sin(((ctl(1)>>1)%2)*get((ctl(0)>>1)%2)))+sin(((((ctl(1)>>2)%2)*get((ctl(0)>>2)%2))+sin(((ctl(1)>>3)%2)*get((ctl(0)>>3)%2)))+sin(((ctl(1)>>4)%2)*get((ctl(0)>>4)%2)))+sin(((ctl(1)>>5)%2)*get((ctl(0)>>5)%2))+sin((((ctl(1)>>6)%2)*get((ctl(0)>>6)%2))+sin(((ctl(1)>>7)%2)*get((ctl(0)>>7)%2)))),9),(get(9)/4)+128
  23. G:put(val(0,t,m)*ctl(3),0),get(0)&256?511-(get(0)&511):get(1)&255
  24. B:put(val(0,t,m)*ctl(3),0),get(0)&256?511-(get(1)&511):get(0)&255
  25. A:a
  26.